home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1997 July: Mac OS SDK / Dev.CD Jul 97 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Interfaces / AIncludes / SegLoad.a < prev    next >
Encoding:
Text File  |  1996-01-24  |  2.1 KB  |  101 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        SegLoad.a
  3. ;
  4. ;    Contains:    Segment Loader Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Package:    Universal Interfaces 2.2 in “MPW” on ETO #20
  8. ;
  9. ;    Copyright:    © 1984-1995 by Apple Computer, Inc.
  10. ;                All rights reserved.
  11. ;
  12. ;    Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13. ;                stack.  Include the file and version information (from above)
  14. ;                in the problem description and send to:
  15. ;                    Internet:    apple.bugs@applelink.apple.com
  16. ;                    AppleLink:    APPLE.BUGS
  17. ;
  18. ;
  19.  
  20.     IF &TYPE('__SEGLOAD__') = 'UNDEFINED' THEN
  21. __SEGLOAD__ SET 1
  22.  
  23.  
  24.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  25.     include 'Types.a'
  26.     ENDIF
  27. ;        include 'ConditionalMacros.a'                                ;
  28.  
  29. appOpen                            EQU        0                    ;Open the Document (s)
  30. appPrint                        EQU        1                    ;Print the Document (s)
  31.  
  32. AppFile                 RECORD    0
  33. vRefNum                     ds.w   1        ; offset: $0 (0)
  34. fType                     ds.l   1        ; offset: $2 (2)
  35. versNum                     ds.w   1        ; offset: $6 (6)        ;versNum in high byte
  36. fName                     ds.l   64        ; offset: $8 (8)
  37. sizeof                     EQU *            ; size:   $108 (264)
  38.                         ENDR
  39.  
  40. ; typedef struct AppFile     AppFile
  41. ;
  42. ;    Because PowerPC applications don’t have segments,
  43. ;    UnloadSeg is unsupported for PowerPC.
  44. ;
  45.     IF GENERATING68K  THEN
  46. ;
  47. ; pascal void UnloadSeg(void *routineAddr)
  48. ;
  49.     IF ¬ GENERATINGCFM THEN
  50.         _UnloadSeg:    OPWORD    $A9F1
  51.     ELSE
  52.         IMPORT_CFM_FUNCTION    UnloadSeg
  53.     ENDIF
  54.  
  55.     ELSE
  56.     ENDIF
  57.     IF ¬ GENERATINGCFM  THEN
  58. ;
  59. ; pascal void CountAppFiles(short *message, short *count)
  60. ;
  61.     IF GENERATINGCFM THEN
  62.         IMPORT_CFM_FUNCTION    CountAppFiles
  63.     ENDIF
  64.  
  65. ;
  66. ; pascal void GetAppFiles(short index, AppFile *theFile)
  67. ;
  68.     IF GENERATINGCFM THEN
  69.         IMPORT_CFM_FUNCTION    GetAppFiles
  70.     ENDIF
  71.  
  72. ;
  73. ; pascal void ClrAppFiles(short index)
  74. ;
  75.     IF GENERATINGCFM THEN
  76.         IMPORT_CFM_FUNCTION    ClrAppFiles
  77.     ENDIF
  78.  
  79. ;
  80. ; pascal void GetAppParms(Str255 apName, short *apRefNum, Handle *apParam)
  81. ;
  82.     IF ¬ GENERATINGCFM THEN
  83.         _GetAppParms:    OPWORD    $A9F5
  84.     ELSE
  85.         IMPORT_CFM_FUNCTION    GetAppParms
  86.     ENDIF
  87.  
  88.     ENDIF
  89.     IF OLDROUTINELOCATIONS  THEN
  90. ;
  91. ; pascal void ExitToShell(void)
  92. ;
  93.     IF ¬ GENERATINGCFM THEN
  94.         _ExitToShell:    OPWORD    $A9F4
  95.     ELSE
  96.         IMPORT_CFM_FUNCTION    ExitToShell
  97.     ENDIF
  98.  
  99.     ENDIF
  100.     ENDIF ; __SEGLOAD__
  101.